**Code to generate the results in Table 1

*Census: 2000
clear
cd "/Users/lucienetorresdemellopereira/Documents/EPGE_Mac/Doutorado/Censo/Censo00"
use Census_00.dta

*Generating location variables
gen urban = [sit_setor_C == 1]
gen rural = [sit_setor_C == 0]
gen slum = [sit_setor_C == 1 & subnormal==1]
gen city = [sit_setor_C == 1 & subnormal==0]
generate location=0
replace location =1 if rural==1
replace location =2 if slum==1
replace location =3 if city==1

*Generating productive sectors variables
gen s1 = [ativ1991>=011 & ativ1991<=042 | ativ1991==581]
gen s2 = [ativ1991>=050 & ativ1991<=059]
gen s3 = [ativ1991>=100 & ativ1991<=300]
gen s4 = [ativ1991==340]
gen s5 = [ativ1991>=351 & ativ1991<=354]
gen s6 = [ativ1991>=410 & ativ1991<=424 | ativ1991==582 | ativ1991==584]
gen s7 = [ativ1991>=451 & ativ1991<=464 | ativ1991==585 | ativ1991==589]
gen s8 = [ativ1991>=471 & ativ1991<=477 | ativ1991==481 | ativ1991==482 | ativ1991==583 | ativ1991>=586 & ativ1991<=588]
gen s9 = [ativ1991>=511 & ativ1991<=512]
gen s10 = [ativ1991>=521 & ativ1991<=545]
gen s11 = [ativ1991>=551 & ativ1991<=578]
gen s12 = [ativ1991>=611 & ativ1991<=619]
gen s13 = [ativ1991>=621 & ativ1991<=624]
gen s14 = [ativ1991==631 | ativ1991==632]
gen s15 = [ativ1991>=711 & ativ1991<=717 | ativ1991>=721 & ativ1991<=727]
gen s16 = [ativ1991==801]
gen s17 = [ativ1991>=902 & ativ1991<=903]
gen s18 = [ativ1991==999]
gen sector=s1+2*s2+3*s3+4*s4+5*s5+6*s6+7*s7+8*s8+9*s9+10*s10+11*s11+12*s12+13*s13+14*s14+15*s15+16*s16+17*s17+18*s18
generate sector_broad = 0
* agric
	replace sector_broad = 1 if sector>=1 & sector<=2
*manuf
	replace sector_broad = 2 if sector>=3 & sector<=5
*low skill serv.
	replace sector_broad = 3 if sector==6 | sector==9 | sector==10 
*high skill serv.
	replace sector_broad = 4 if sector==7 | sector==8 | sector==11 | sector==12 | sector==13 | sector==14 | sector==15 | sector==16 

*Generating ocupation variables	
generate type_ocup = 0 
*routine
	replace type_ocup = 1 if ocup1991==301 | ocup1991==302 | ocup1991==303 | ocup1991==304 | ocup1991==305 | ocup1991==321 | ocup1991==322 | ocup1991==331 | ocup1991==332 | 	ocup1991==333 | ocup1991==334 | ocup1991==335 | ocup1991==336 | ocup1991==252 | ocup1991==293 | ocup1991==571 | ocup1991==601 | ocup1991==645 | ocup1991==646 | ocup1991==831 | ocup1991==832 | ocup1991==833 | ocup1991==834 | ocup1991==861 | ocup1991==862 | ocup1991==863 | ocup1991==864 | ocup1991==865 | 	ocup1991==866 | ocup1991==867 | ocup1991==868 | ocup1991==869 | ocup1991==050 | ocup1991==051 | ocup1991==927 | ocup1991==999 | ocup1991==020 | ocup1991==021
*non-routine or cognitive	
	replace type_ocup = 2 if ocup1991==101 | ocup1991==102 | ocup1991==103 | ocup1991==104 | ocup1991==121 | ocup1991==122 | ocup1991==123 | ocup1991==124 | ocup1991==125 | ocup1991==141 | ocup1991==142 | ocup1991==143 | ocup1991==144 | ocup1991==151 | ocup1991==152 | ocup1991==153 | ocup1991==154 | ocup1991==171 | ocup1991==172 | ocup1991==173 | ocup1991==181 | ocup1991==182 | 	ocup1991==194 | ocup1991==201 | ocup1991==202 | ocup1991==203 | ocup1991==204 | ocup1991==205 | ocup1991==211 | ocup1991==212 | ocup1991==213 | ocup1991==214 | ocup1991==215 | ocup1991==216 | ocup1991==217 | ocup1991==218 | ocup1991==219 | ocup1991==231 | ocup1991==232 | ocup1991==233 | ocup1991==241 | ocup1991==251 | ocup1991==261 | ocup1991==271 | ocup1991==272 | ocup1991==273 | ocup1991==274 | ocup1991==275 | ocup1991==276 | ocup1991==277 | ocup1991==278 | ocup1991==279 | ocup1991==280 | ocup1991==291 | ocup1991==292 | ocup1991==641 | ocup1991==642 | ocup1991==643 | ocup1991==644 | ocup1991==711 | ocup1991==721 | ocup1991==811 | ocup1991==851 | ocup1991==852 | ocup1991==001 | ocup1991==002 | ocup1991==003 | ocup1991==004 | ocup1991==005 | ocup1991==006 | ocup1991==007 | ocup1991==008 | ocup1991==009 | ocup1991==010 | ocup1991==011 | ocup1991==012 | ocup1991==015 | ocup1991==030 | ocup1991==031 | 	ocup1991==032 | ocup1991==033 | ocup1991==034 | ocup1991==035 | ocup1991==036 | ocup1991==037 | ocup1991==038 | ocup1991==039 | ocup1991==040 
	
*Generating education variables	
gen g1 = [anos_estudoB==0]
gen g2 = [anos_estudoB>=1 & anos_estudoB<=4]
gen g3 = [anos_estudoB>=5 & anos_estudoB<=8]
gen g4 = [anos_estudoB>=9 & anos_estudoB<=11]
gen g5 = [anos_estudoB>=12 & anos_estudoB<=16]
gen group_school=g1+2*g2+3*g3+4*g4+5*g5

*Employed Adult Population Distribution, by Location and by Occupation
tab type_ocup [iw=peso_pess] if type_ocup!=0 & idade>=25 & idade<=65	
tab type_ocup [iw=peso_pess] if type_ocup!=0 & idade>=25 & idade<=65 & rural==1
tab type_ocup [iw=peso_pess] if type_ocup!=0 & idade>=25 & idade<=65 & slum==1
tab type_ocup [iw=peso_pess] if type_ocup!=0 & idade>=25 & idade<=65 & city==1

*Employed Adult Population Distribution, by Location and by Sector
tab sector_broad [iw=peso_pess] if sector_broad!=0 & idade>=25 & idade<=65	
tab sector_broad [iw=peso_pess] if sector_broad!=0 & idade>=25 & idade<=65 & rural==1
tab sector_broad [iw=peso_pess] if sector_broad!=0 & idade>=25 & idade<=65 & slum==1
tab sector_broad [iw=peso_pess] if sector_broad!=0 & idade>=25 & idade<=65 & city==1

*Employed Adult Population Distribution, by Location and by Education
tab group_school [iw=peso_pess] if group_school!=0 & idade>=25 & idade<=65	
tab group_school [iw=peso_pess] if group_school!=0 & idade>=25 & idade<=65 & rural==1
tab group_school [iw=peso_pess] if group_school!=0 & idade>=25 & idade<=65 & slum==1
tab group_school [iw=peso_pess] if group_school!=0 & idade>=25 & idade<=65 & city==1
